home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Wonky Flux Batch 2019 02
/
Wonky_Flux_Batch_2019-02.zip
/
Wonky Flux Batch 2019-02
/
115 - DD Deluxe 4.0.dsk
/
DDDELUXE.V5.0
/
D.D.DELUXE.S1
/
STARTUP.bas
< prev
next >
Wrap
BASIC Source File
|
2000-01-01
|
821b
|
13 lines
1 REM DISK DISINTEGRATER DeLUXE BOOT DISK
2 REM (C)LOGIX INNOVATIONS 1989<CTRL-J><CTRL-J><CTRL-J>
10 TEXT : HOME :D$ = CHR$(4)
20 PRINT D$"FRE": PRINT D$"BLOAD STARTUP.CMD,TCMD,A$4000": CALL 16384
30 INVERSE : HTAB 6: PRINT "------------------------------"
40 HTAB 6: PRINT "DISK DISINTEGRATER DELUXE V5.0"
50 HTAB 6: PRINT "------------------------------"
100 NORMAL : VTAB 8: PRINT "CHOOSE:"
110 VTAB 11: HTAB 3: PRINT "[1] RUN D.D.DELUXE V5.0"
120 PRINT : HTAB 3: PRINT "[2] QUIT TO APPLESOFT BASIC"
130 VTAB 8: HTAB 8: GET A$: IF A$ < >"2" THEN PRINT D$"PREFIX /D.D.DELUXE.S1/DDDELUXE.V5.0": PRINT D$"-D.D.DELUXE.LOAD"
140 VTAB 8: HTAB 1: CALL -958: PRINT "TO VIEW A TEXT FILE, ENTER:": PRINT : PRINT : HTAB 3: PRINT "]TYPE <FILENAME>"
150 PRINT : PRINT : PRINT : PRINT "HAVE FUN!!": PRINT : NEW